﻿Namespace DotNetNuke.Modules.ActiveForums
    Partial Public Class _default
        Inherits ForumBase

        Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            btnContinue.Visible = Me.HasModulePermission("EDIT")
        End Sub

        Private Sub btnContinue_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnContinue.Click
            Dim fc As New ForumsConfig
            Dim init As Boolean = False
            init = fc.ForumsInit(PortalId, ModuleId)
            If init = True Then
                Dim objModules As New DotNetNuke.Entities.Modules.ModuleController
                objModules.UpdateModuleSetting(ModuleId, "AFINSTALLED", init.ToString)
                DataCache.ClearAllCache(ModuleId, TabId)
                Response.Redirect(EditUrl())
            End If
        End Sub
    End Class
End Namespace
